home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Taifun
/
Taifun 004 (1987-02-15)(Ossowski, Stefan)(DE)(PD).zip
/
Taifun 004 (1987-02-15)(Ossowski, Stefan)(DE)(PD).adf
/
MandelVroom
/
getfile
/
testing.c
< prev
Wrap
C/C++ Source or Header
|
1987-03-04
|
2KB
|
98 lines
#include <exec/types.h>
#include <intuition/intuition.h>
#include <libraries/dosextens.h>
#ifdef MANX
#include <functions.h>
#endif
#define I_REV 31
#define G_REV 31
#define EWDTH 640
#define EHGHT 198
#define NL NULL
struct IntuitionBase *IntuitionBase;
struct GfxBase { int b; } *GfxBase;
struct NewScreen TS = {
0,0,640,200,2,
1,2,
HIRES, WBENCHSCREEN,
0L, 0L, 0L
};
/* Used to open a Window */
struct NewWindow EdWindow = {
0,2,EWDTH,EHGHT-2, /* LeftEdge,TopEdge,Width,Height */
1,2, /* DetailPen,BlockPen */
MENUPICK | NEWSIZE | REFRESHWINDOW | ACTIVEWINDOW |
MOUSEBUTTONS | RAWKEY | MOUSEMOVE,
WINDOWDRAG | WINDOWSIZING | SIMPLE_REFRESH | ACTIVATE | WINDOWDEPTH,
NL,NL,"Window", /* FirstGadget, CheckMark, Title */
NL, /* Screen ( Null) */
NL, /* BitMap */
150,45,32767,32767, /* MinW, MinH, MaxW, MaxH */
CUSTOMSCREEN }; /* Type */
main()
{
struct Window *eW;
struct Screen *eS;
struct Process *OurTask;
struct Window *old_pr_WindowPtr;
static char def_name[50] = "Meps";
static char def_dir[50] = "df1:";
if ( ! (IntuitionBase = (struct IntuitionBase *)
OpenLibrary("intuition.library",(long)I_REV)) ||
! (GfxBase =(struct GfxBase *)OpenLibrary("graphics.library",(long)G_REV)) )
{
printf("Can't open libraries\n");
exit(20);
}
if ( ! (eS = (struct Screen *)OpenScreen(&TS)) )
{
printf("Can't Open Screen!!!!!\n");
exit(22);
}
EdWindow.Screen = eS;
if ( ! (eW =(struct Window *)OpenWindow(&EdWindow)) )
{
CloseScreen(eS);
printf("Can't open window...\n");
exit(21);
}
/* CAUTION!!! KNOW ABOUT pr_WindowPtr before you use it!!! */
OurTask = (struct Process *)FindTask(0L);
old_pr_WindowPtr = OurTask->pr_WindowPtr;
OurTask->pr_WindowPtr = eW;
get_fname(eW,eS,"Nicht",def_name,def_dir);
printf("File name is :%s\n",def_name);
printf("Directory is :%s\n",def_dir);
/* ALWAYS RESTORE pr_WindowPtr BEFORE CLOSING THE WINDOW!!! */
OurTask->pr_WindowPtr = old_pr_WindowPtr;
CloseWindow(eW);
CloseScreen(eS);
CloseLibrary(GfxBase);
CloseLibrary(IntuitionBase);
}